1 REM"          "BM STAFF EYES ONLY!(null)
2 POKE 808,234:POKE 53280,0:POKE 53281,0
4 FORT=1 TO 500:NEXT
6 PRINT"[147][155]       - THE BIG MOUTH MAGAZINE -"
8 FORT=1 TO 2000:NEXT
10 PRINT"[147]"
15 FORT=1 TO 500:NEXT
20 PRINTTAB(7)"THE BIG MOUTH - MAIN MENU"
30 PRINT"A - WEIRD WORLDS"
31 PRINT"B - WEIRD WORLDS IMPORTANT NOTE"
32 PRINT"C - PARALAX PREVIEW"
33 PRINT"D - TUSKER/DOMINATOR MUSIC RIPP"
34 PRINT"E - LAST NINJA 2 MUSIC RIPP"
35 PRINT"F - CONNECT 4"
50 PRINT"PICK A PROGRAM TO LOAD (A-F) ?"
55 GET A$:IF A$="" THEN 55
60 A=ASC(A$):IF A-64<1 OR A-64>6 THEN 55
65 IF A-64=2 THEN 110
70 FORX=49152 TO 49170:READY:POKE X,Y:NEXT X
75 PRINT"  LOADING YOUR SELECTION - PLEASE WAIT"
76 SYS 49152
77 DATA 120,169,013,141,040,003,169,192
78 DATA 141,041,003,088,096,238,032,208
79 DATA 076,237,246
80 ON A-64 GOTO 105,110,120,121,122,123
100 :
105 LOAD"WEIRD WORLDS /EX",8,1
110 PRINT"[147]"TAB(10)" WEIRD WORLDS [146] NOTE"
111 PRINT"BEFORE LOADING THE DEMO, TURN YOUR DISK"
112 PRINT"DRIVE OFF AND THEN ON AGAIN, OR IF YOUR"
113 PRINT"DRIVE HAS A RESET BUTTON, PRESS THAT."
114 PRINT"IF YOU DO NOT DO THIS, THE DEMO WILL    STUFF UP AFTER THE MARIO INTRO."
115 PRINT""TAB(12)" PRESS SPACEBAR "
116 GET A$:IF A$<>CHR$(32) THEN 116
117 GOTO 10
120 LOAD"PARALAX  PREVIEW",8,1
121 LOAD"TUSKER/DOMINATOR",8,1
122 LOAD"LAST NINJA 2 RIP",8,1
123 LOAD"CONNECT 4    /BA",8,1